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//this is an example of intercepting an opengl call, and converting it into dual Direct3d$. 

//This is one of the simplest examples possible. 

//some runctxons dont require much work at all. 

//Other functions require extremly complex data conversion. 

//this ClearDepth function, happens to be very similar to its d3d8 equivalent function 
// wc know the vaJ. fvr depth is [0-1] which JLsr &^ne for inpuz of d Jdtf ' s clear function* 
// thus no conversion of data required, just redirection. 
// If any conversion is required, it is done inside Opengl32 . cpp. 

// 

//OPENGL32.CPP 

//header for real function, written by SGT nponr:r. 
void { stdcall* real_glClearDepth) (GLclartipd depth) ; 



//During init, we retrieve a pointer to the real opengl function 

real_glClearDepth = (void{ stdcall*) (GLclampd depth) ) GetProcAddsess (DLLInst, "glClearDepth") ; 



//inside our opengl32.dll wrapper, our pseudo function looks like this : 
dgelcpec (dllcxpori:) void otdcall g iclectr Depth (GLi*l«aipU depth) 

if (convertTOd3d3 ) 
W { //activly converting stream fnfrn d3dBdual 

r% //preform any necesary data conversion here. 
JSj d3d jlClearoepth (depth) ; 

Ms else 

y. {//pass through, debug mode, normal OpenGL operation. 
real_glClearDepth (depth) ; 

W } 

m 

/¥ — _ 

/'0OAL.CPF 

//The opengl32 .dll wrapper calls this function provided by Owx DualRendtmng System. 
vfeld d3d glClearDepth (float depth) 

H\ dual_sIClearDepth (dfipt-h) ; 

/U^he dual glClearDepth issues the commands to the 2 video cards. 

void dual_glClearDepth (float depth) 

( 

if (g_d3ddevl !- NULL) 
( 

g d3ddevl->Clear (CflULL, D3DCLEAR_ZBUFFER,D3DCOLOR XRGB (0x00, 0x00, 0x00) .depth, 0) ; 
} ~ 
if <g_d3ddcv2 !- NULL) 

I 

g_d3ddev2->Clear (0, NULL, D 3 DCLEAR_Z BUFFER, D3DCOLOR_XRGB (0x00, 0x00, 0x00) , depth, 0) ; 

> 
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// GLIDE EXAMPLE of dual rendering 

//Glide openly allows access to 2 cards by calling grSstSelect (0) f or 1 

//Glide also doesnt have to worry about "exclusive tnode" which only allows 1 full screen DrQCtX wind 
ow, 

// So no special code for window creation is necessary . 

//£>wc to difference* in the API's, t/je dc*c* at this point has already been transtormed from 3D into 
2D data. 

//As a result, less accurate method of creating stereo image 1$ allpied. 

// This stereo mathcd tt*c>wb the geometry (in 2D) r rathexr then th<s ccixeul method uf moving the earner 
a. 

//Assembly was used to bypass the C/C++ const barrier. In assembly, it is not "read only" 

// const means "read only" "you cant modify it legally" 

// In assembly language, the "read only" lock is not checked. 

// This allows us to move the const geometry. 

// The assembly simply adds, or subtracts an offset, based on the veometrvs distance from earn*™. 

FX_ENTRY void FX_CALL PgrDrawTnangle (const GrVertex *a, 

const Grvertex *b, 

const brvertex *c, floats angle, floats limit) 

{ 

float dista - (a ->oow) * angle; 

if ( abs ( (ant) dista) >- abc { (int) limit ) ) 
■jy? dista = limit; 

m float distb - (b->oow) * angle; 
2 if ( abs< (int)distb) >= abs C finfc) 3 imit) ) 
W distb - limit; 

H float distc = (c->oow) * angle; 
y. if (abs ( (int) distc) >= abs ( (int) limit) ) 
distc *« limit; 



PI 



float tempera ire = O.Of; 

//On commence par soustralre le decalage 



asm 



rji 



//Premier point 
pushad 

mov esi r a 

mov eax, [esi] 

mov temooraire, eax 

fid temporaire 

fsub dista 

fstp temporal re 

mov eax, temporal re 

mov [esi],eax 

//Devxieme poinz 

uiu v e s x , b 

mov eax, [esi] 

mov temporal re, eax 

fid temporal rc 

fsub distb 

fstp temporal re 

mov eax, tPTTipors i 

mov (esi],eax 

//Troisier point 

mov esi, c 

mov eax, [e$i] 

mov temporaire, eax 

fid temporaire 

rsub distc 

fstp temporal re 

mov eax, temporal re 

a»Ov f esi J / «Jax 

pop ds 
popad 



REAL_grDrawTH angl <=> (a, h, r) 
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dista = 2 * dista, 
distb = 2 * distb; 
tfistc - z * di&c<., 



asm 

{ 

//Premier point 
pushad 
push ds 
mov esi, a 
roov eax, [esi] 
mov temporal re r eax 
fid temporaire 
fadd dista 
fstp temporaire 
mov eax, temporaire 
mov [esi] , cax 
//Deu.xiejne point 

mov 

mov eax, [esi] 
mov temporaire, eax 
•Fid temporaire 
fadd distb 
fstp temporaire 
mov eax, temporaire 
mov lesi ] , eax 
//Troisieme point 
mov esi/C 
mov eax, [esi] 
mov temporaire, eax 
fid temporaire 
facia disco 
%i fstp temporaire 

mov eax, temporaire 
mov [ooi ] * eax 
hk pop ds 
M popad 

REAL_grS$t5elect (1) ; 
RE&lTgrDrawTriangle (a, to, c) ; 

//Restoration 

dista » dista / 2 

distb « distb / 2 

OiStc = distc / 2 



fit 



asm 

//Premier point 

pushad 

push 

mov esi r a 
mov eax, [esi] 

mov t-.PTnpnr^iro, 

fid temporaire 
fsub dista 
fstp temporaire 
mov eax, temporaire 
mov [esi] , eax 
//Deuxieme point 
mov esi,b 
mov eax, [esi] 
mov temporaire, eax 
I1U UtJKipuLdxre 
fsub distb 
fstp temporaire 
mov caii, temporaire 
mov [esi ] , eax 
//Troisieme point 

mov r r 

mov eax, [esi] 

mov temporaire, eax 
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fid temporal re 
fsuJb distc 
fstp tempoj.*Xt« 
mpv esx, temporaire 
mov [esi] f eax 
pop as 
popad 



REAL_gr$stSelect (0) ; 



1=4 



■ y 
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//windows specific code for creation or" 2 full screen windows 

//Function is called twice, once for each display. 2 displays for 2 eyes. 

* 

boo! WindowCreate ( int Id, 

char* pWindowName, 
char* pClassNaroe, 

HWND 5 hwnd, 

HWND& parent hwnd) 

{ 

WNDCLASS wr.; 



wc . style 
if <ld==0) 



0; 



wc. IpfnWndProc 

} 

«ise if (Id— I) 



wc. lpfnwndFroc 



{ 
) 

els* 

{ 
) 

wc.cbClsExtra 
wc.cbWndExtra 
wc , hlnstance 
wc -hlcon 
wc .hCursor 
wc.hbrBac kg round 
wc . lps zMenuNante 
wc . IpszCiassName 



= (wndproc) WndProcl; 



= (TODPROC) WndProcl; 



0; 
0; 

hlnstance; 
NOLL ; 

(HCURSOR) NOLL; 

(HBROSH) COL0R_INACTIV£CAPTION; 
NULL; 

pClassName; 



if ( ! RegisterClass ( &wc) ) 
( 

sprintf (pDebugText , "R^istcrClaas (iwc) FAlLEDNu") f 
OutDebugErrotMsg ( 3 ; 
return false; 

) 



int thisone =» 0? 

//this part is critical for Atlantis. Allows 2 FULL SCREEN, Uarriwor* accelerated window 
//the poorly documented WS POPUP\WS VISIBLE flags make a 
// window without borders, ie windowed, but FULL SCREEN 

//2 "real" FULLSCREEN is impossible, because first "real" FULLSCREEN sets exclusive mod*. 

hwnd = CreateWindow(pClassNarae, 
pWindowName, 

W5_FOPUPiW5_VIS>I3l^ , 

CWU5EDEFAULT, 

CW_USE DEFAULT, 

ScroonWidth, 

ScreenHeight, 

parenthwnd, 

NULL , 

hlnstance, 
NULL) ; 

// If the main window cannot be created, terminate 
// the application, 
if (hwnd == 0) 

{ 

sprintf <pDebugText#"hwnd— -NULL : FAILEDW 1 ); 
OutDebugErrorMsg ( ) ; 
return false; 

} 



if (Id— 0} 

I 

//position first window at 0,0 on monitor 1 assumed to be at 640x490 
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SetWindowPos ( hwnd / HWND_TQPM0ST , 0, 0, ScreenWidth, ScreenHeight , SOT_SHOWWINDOW ) ; 

t?i»« if ca==i) 

{ 

//position secc/id window at 0,0 on monitor 2 assumed to be at 640x4$0 

SotWindowTPos (hwnd, HWNDJTOPMOST, ACTUALOcrccnWidth, 0 , S^xcJ<ii*Width, 5creenaeJ.ght , 5WP_SH0WWINDQW ) 

) 

} 

//D3DB creation of 2 devices 

//debug idefines, allows fox programmer to debug system using- 1, or 2, or botn devices simuXtaneousl 
y. 

//for release, both are defined, 

// ACCELERATOR 2 AVAILABLE 

// ACCELERATOR 2 AVAILABLE 

int InitializeHardware {HINSTANCE hlnstance) 

C 

WNDCLASS wcl; 
s j WNDCLA55 wc2; 

O static char *CLASSJ«VMEl - "CLASS1"; 
#5* static char *CLAS$J*AME2 = n CLASS2"; 
H Static char *WTNHOW NftMF.1 = "Window 1"; 
W static char 14 WINDOW - "Window 2 W ; 

is* 

m Di$kFile=f open ( "c : WbackuoW Dual Test . TXT" , "w") ; 
j4 fprintf (DiskFile, "Atlantis CyberspaceW) ; 
f|| f close (DiskFile) ; 

^ Sprinti (pDemigText, "-InitxaUzeHardware-W ) ; 
* OutDebugErrorMsg ( } ; 

M //_ 

HWND DssJctopwjndow = GetDesktopWindow O ; 
O WindowCreate ( 0,h Instance, window_NAME1, CLASSJtfAMEl, gjawndl, Desktopwindow) ; 

p 5 

#ifdef ACCELERATOR 2 AVAILABLE 
fe* WmdowCrcate (1 , hlnstance r ftIND0W_NAME2 , CLASS_NAME2 , g__hwnd2 / g_hwndl ) ; 

// 



#ifdof ACCELERATOR^! ^AVAILABLE 

pEnui* = Direct 3 DCr£ate8 ( 03 D_SDK VERSION) ; 

ir cpbnum — null) 

{ 

sprintf (pDebugText, "Direct3DCreate8 Device 1 : FAILED\n" } ; 
OutDebugE^utMay C) ; 
return -1; 

} 



#i£d6f ACCELERATOR^? AVATf.fc^T." 

pEnum2 = Direct3DCreat®8 (D3D_SDKJv r ERSION) ; 

if (p£nurn.2 =-> NULL) 

{ 

sprintf (pDebugText, "Direct3DCreate8 Device 2 : FAILEdW); 
OutDebugErrorMsg ( ) ; 
return -1; 

} 

#mdi€//ACCELERAT0R^2_AVAILABLE 

// 



♦ifdef ACCELERAT0R_1_AVAILABLE 

Dovic^Croate (g_hwndl7pEn V Tt\, g_d3ddevl , D30ADAFTER_DEFAULT) / 
# ©ndif //ACCELERA T0R_ l^AVAHABLE 
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#ifd©f ACCELERATOR^ JWAIIABLE 
Devicecreate (g_hwnd2, pEnum2, g_d3ddev2, I) ; 

**nCLiZ//ACCJLL&XAT<JK J AVAILABLE 



// 



#ifd«f ACCELERATOR 1_AVAILABLE 
ShowWindow(g_hwndl7 SW_S HOW DEFAULT} , 
Upd^l-oWS y>d*v; (g hwndl) • 
#endi£ / / ACCELERATOR^ 1_AVAILABLE 

#ifdef AC C E LERAT OR_2 _AVA I L ABLE 
ShowWindow(g_hwnd2, SW_SHOWDE FAULT) , 
UpdateWindow (g_hwnd2 ) ; 
*end±£/ /ACCELERATOR 2 AVAILABLE 



// 

if (g_d3ddevl) 

i 

g_d3ddevl->SetRenderState ( D 3 DR S_L IGHT ING , FALSE) ; 
g_d3ddevl->SetRender State <D3DRS_ALPHABLENDENABL£, FALSE) ; 
g_d3ddevl->SctRendcr State (D3DU0_FILLMODE, D30TILLJ50LID) ; 

Li g d3ddevl~>SetRenderstate (D3DRS CLIPPING, TRUE) ; 

pas — — 

■0 g_d3ddevl->SetRenderStat€> ( D 3 DR S_Z EN AB LE , FALSE ) ; 

Q g_d3ddevl->SetRenderState {D3DR$_?,WRITEENABLE, FALSE) ; 

a u 

g_d3ddevl->SetTextureStage5tate (0, D3DTS5JXINFILTER, D3DTEXF_LINEAR) ; 
hk g_d3ddevl->SetTextureStageState (0,D3DTSS MAGFILTSR, D3DTEXF_LINEAR) ; 
f% g_d3ddevl->5etTextureStage$tate(0, D3DT$S MIPFILTER, D30TEXF POINT); 

21 } 

flj if (g_d3ddev2) 

H < 

$_d3ddev2->3etReMd*LSLcil<s { D3 DK5_LH3HT IN& r £AL$t.) ; 
i t gj33dd«v2->SetRenderState (D3DR$_ALPHABLENDENABLE, FALSE) ; 

p4> g_d3ddcv2->SetRenderStatc (D3DRS_FILLM0DE, D3DFILL SOLID) ; 



g_d3ddev2->SetRenderState (D3DRS_CLIPPING, TEUE) ; 

a_d3ddev2->SetRender State fD3nRS_7.F.NART.F, false) ; 
g_d3ddev2->SetRenderState (D3DRS_2WRITEENABLE, FALSE } ; 

g d3ddev2->5etTextureStageState(0,D3DTSS_MINFILTER, D3DTEXF_LINEAR) ; 
gjS3ddev2->SetTextureStageState (0, D3DTSS_MAG FILTER, D3DTEXF_LINEAR) ; 
g__d3ddevl->$etTextureStageState {0, D3DTSS MIPFILTER, D3DTEXF POINT) ; 

} 

iniriaiizexextureManager {) ; 
dual_R^storeVertexBuff ers ( ) ? 
Re$etSindTextureOrderLi$t () ? 
d3d_InitMatrixCt*ck Ug_ModclView3Lac.k ) ; 
d3d_InitMatrixStack(Sg_ProjectionStacJO ; 

g^viewport.Y = 0; 

g_Viewport .Width =64 0 
$_Viewport. Heigh h = dfifi 
g^Viewport .MinZ =0.0 
g^viewport-MaxZ =1.0 
return 0; 



//This function is onQ of many that handle the rendering. 

// Other function^ similar to this one d>re ; RenderTriangle, RenderQuad, RenderTrxangleStrip, . . etc. 
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//the global variables g dJddevl r and g d3ddev2 are pointers to IDirect3DDevice8 . 

//a IDirect3DDeviceS can be thought of as the last software interface to the video card, 

//must conun&nds are issued cwlce. 

//After a g d3ddev command is issued, it immediatly returns, so that execution can continue. 

// This allows for ccncurenoy. The first c&rd starts rendering, ans the second card is recieving da 

// At soine point, they are both rendering r and Intel CPU is free to continue doing other things, wh 
He video cards render CO their own memory. 

void RftnrtfirTr-i flnglc^n fMYVEPTEX2* pVorti CSS , long- num_vc*tc ) 

if (g_d3ddevl 1= NULL) 

{ 

assert (state_d3ddevl==l ) ; 

) 

if (g_d3ddev2 ! = NULL) 

i 

assert (state d3ddev2 — 1); 

} 

HRESULT Error = S_OK; 
HRESULT hr = 5_0K; 
MYVf.RTF.x2 Quad [ 1 02 4 ] ; 

long i; 

^ k //////////////////////////// ///////////////// /////////////////////////////////////// 
Qif <g_d3ddevl 1= NULL J 

ff Fraro^Cownter-r+; 

ph g_d3ddevl->SetvertexShader (D3DFVF_03DVERTEX) ; 
#xf4«f USE^SET^TEXTURE 

SI y_d3ddevl-*5etTexture< 0, p gi TiiXTURSlc glBmdTexcure) . pD3DTextureO ) ; 

\J if ( max_nuiri_ve r t s<nuni_vGrt s ) 

:i max mim verts-nun verts; 

H ■) ' ~ " 

if (bWriteTororground) 

ffj g_d3dd*vl->SetRender5tate ( D3DRS_ZENABT,f., tphf.j ; 

i5 g^d3ddevl->SetR«nderState (D3DRS_ZWR7.TEENAELE, FALSE) ; 

y? else if (bWriteToBAckground) 

i 

g_<33ddevl->SetRenderState (D3DRS_Z€NABLE r TRUE) ; 
g_d3ddevl->5etRenderState(D3DRS ZWRITEENABLE, FALSE) ; 

) 

else 

{ 

g_d3ddcvl >SetftenderCt«t© (D3DR3_3ENABLE, bZBufferRead ); 

g_d3ddevl->SetRenderState (D3DRS ZWRITEENABLE, bZButf erWrite) ; 

} 

#ifd©f RENDER_P0LYGONS 

hr « g_d3ddevl->DrawFrimitiv€UP(D3DPT_TRIANGLEFAN,fium_verts-2 / pVertices,si2aof <MYVERTEX2) ) ; 
total_nuin_vert$ += nuro_verts; 
total~rmm_tris += num verts -2; 
#endif// RENDER POLYGONS 
if { FAILED (hr) ) 
{ 

sprintf (pDebugText, "g_d3ddevl->DjrawPrimitiveUP : FAILED\n") ; 
OutDebugErrorMsg ( ) ; 
GetErrcr(hr) 7 

OutDcbuyEixuiMisg () ; 

} 

} 

/////////////////////////////////////////////////'////////'/////////////////////////// 
if {g_d3ddev2 !- NULL) 

{ 

FrameCouiihfir++; 

g_d3ddev2->Secvertex5hader(D3DFVF D3DVERTEX) ; 
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#ifd©£ USE_SET_TEXTORE 

g^d3ddev2->5etTexture ( 0, p_gl_TEXTURo [ c_glBindTex ture ] ,pD3DTexturel) , 

if (bWritcToForground) 

g_d3ddev2->SetRenderState {D3 DRS_ZENA13LE, TRUE) ; 
g_d3ddev2->S<stRenderState (D3DR5J5WRITEENABLE, FALSE) ; 

qIs© if (bWriteToBacJcground) 

g_d3ddev2->SetRenderState ( D3 DR5_ZENABLE * TRUE) ; 
9jd3ddev2->SctRender$tate{D3DRS_ZWRIT2£NABLE, FALSE) ; 



else 



g_d3ddev2->5etRenderStat€> (D3DR5 Z ENABLE, bZBufferRead ); 
g_d3ddev2->SetR©nder$t§te (D3DRS~2WRlTEENABLE,bZBuff erWrite) ; 



tifdef RENDER_FOLYGONS 

hr - g_d3ddov2->DrowprimitiveUr (D3PFT_TRIANQL£FAN, ouui_v«i Ljs-2,pV«x Llc«53, 8iz6ot Unr ViLKTfcXi J j 
total_num_vezts + " num_verts ; 
M total _num_tris +■ mim_vert$-2; 

/RENDER POLYGONS 
^ if (FAILED (hr) ) 



sprint f (pDebugText, "<y_d3ddev2->DrawFrimiti veUP : FWLED\n rt ) ; 
QutDebugErrorMsg ( ) ; 
GQtError (hrj ; 
OutDebugErrorMsg { ) ; 



°1 } 

N ////////////////////////////////////////////////////////////////////////////////////////////// 

f dual^CetSDx&a (05 ; 
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